home *** CD-ROM | disk | FTP | other *** search
/ Educational Software Cooperative 4 / Educational Software Cooperative 4.iso / orbots / install.fil < prev    next >
Text File  |  1995-12-14  |  3KB  |  152 lines
  1. '' Install Script for ORBOTS 11/5/95
  2. BACKGROUND 63
  3. LANGUAGE ENGLISH
  4. BORDER 1
  5. TELESCOPE OFF
  6. WINOPEN 18 2 95
  7. "Pik A Program & Sunshower Games "
  8. ""
  9. "present"
  10. ""
  11. ""
  12. "          the game"
  13. ""
  14. WINUPDATE +13 +4 222
  15. "ORBOTS "
  16. PAUSE 100
  17. TELESCOPE ON
  18. SHADOW ON
  19. :which_drive
  20. SPACE 600
  21. DRIVE C 0 12 31 15 32 14 79
  22. PATH \ORBOTS 0 12 31 15 32 14 79
  23. exist ORBOTS.1
  24. JUMP.YES DOES_EXIST1
  25. JUMP.NO NOT_EXIST1
  26. :NOT_EXIST1
  27. WINOPEN 0 50 79
  28. ""
  29. " The file ORBOTS.1 is not on the  "
  30. " current installation disk"
  31. ""
  32. " Do you wish to continue with the "
  33. " current installation (Y/N)? "
  34. ASK 49 31
  35. pause 250
  36. JUMP.NO STOP_INSTALL
  37. WINCLOSE
  38. DISK 0 ORBOTS.1 0 0 31
  39. :DOES_EXIST1
  40. unpack ORBOTS.1 12 10 31 32 14 79
  41. JUMP.FAIL INSTALL_FAILURE
  42. WINOPEN 0 12 79
  43. ""
  44. "ORBOTS has now been installed on your hard drive"
  45. ""
  46. "                     To run the program..."
  47. "Change to the drive and directory you have chosen in this setup (usually"
  48. "C:\ORBOTS)."
  49. "         Type "ORBOTS" and then hit the enter or Return key   "
  50. "   We hope you enjoy Orbots so much that you'll send"
  51. "   the registration form to get the other 2 levels!"
  52. "                Press the [Enter] key to continue."
  53. ""
  54. ""
  55. WINUPDATE +30 +3 30
  56. "~1~2"
  57. WINUPDATE +30 +12 27
  58. "THANK YOU"
  59. WAIT +36 +12
  60. WINCLOSE
  61. WINOPEN 0 12 31
  62. "Would you like to SEE the order form for Orbots?"
  63. ""
  64. WINUPDATE +31 +2 30
  65. "(Y or N)"
  66. ASK +39 +2
  67. WINCLOSE
  68. JUMP.NO PRINT_INSTALL.TXT
  69. VIEW ~1~2\order.txt 79 31
  70. :PRINT_INSTALL.TXT
  71. WINOPEN 0 12 31
  72. "Would you like to PRINT the order form for Orbots?"
  73. ""
  74. WINUPDATE +31 +2 30
  75. "(Y or N)"
  76. ASK +39 +2
  77. WINCLOSE
  78. JUMP.NO EXIT
  79. WINOPEN 0 0 31
  80. ""
  81. "  Printing the order form ...  "
  82. ""
  83. PRINT ~1~2\order.txt
  84. WINCLOSE
  85. JUMP.FAIL PRINTER_ERROR
  86. JUMP EXIT
  87. :PRINTER_ERROR
  88. WINOPEN 0 12 79
  89. "Your printer is not responding.  Possible problems:"
  90. "   -- Printer is not turned on"
  91. "   -- Printer is out of paper"
  92. "   -- Printer is not attached to LPT1 (parallel port 1)"
  93. ""
  94. "Do you want to try to print again  (Y or N)?"
  95. ASK 57 18
  96. WINCLOSE
  97. JUMP.YES PRINT_INSTALL.TXT
  98. :EXIT
  99. WINOPEN 0 12 31
  100. "      Thank you for playing "
  101. ""
  102. "            Orbots"
  103. ""
  104. ""
  105. ""
  106. ""
  107. "   Please register your shareware!"
  108. ""
  109. WINUPDATE +12 +8 30
  110. "Please register your shareware!"
  111. WINUPDATE +12 +11 31
  112. "┤ Press the [Enter] key to continue ├"
  113. WINUPDATE +24 +11 30
  114. "[Enter]"
  115. WAIT +47 +11
  116. WINCLOSE
  117. shell
  118. "~1"
  119. "cd ~2"
  120. BORDER 2
  121. WINOPEN 0 12 47
  122. "If you're not sure you have the latest shareware copy of"
  123. "           Orbots, you can find it on "
  124. ""
  125. "   Compuserve in the Pik A Program section GO PIKAPRO"
  126. ""
  127. "   or on the internet at http:\\www.pik.com\index.html"
  128. ""
  129. ""
  130. "        Press the [Enter] key to run Orbots."
  131. WAIT +21 +9                                  ' wait for the enter key
  132. RUN ~1\~2\orbots
  133. END            ' exit the system normally
  134. :INSTALL_FAILURE
  135. WINOPEN 0 12 79
  136. "THE INSTALLATION PROGRAM FAILED PRIOR TO COMPLETION"
  137. ""
  138. "Possible reasons:"
  139. "   -- The floppy disk was removed prior to completion."
  140. "   -- The floppy disk was damaged during shipping."
  141. "   -- Your disk drive is out of alignment."
  142. "   -- The files were corrupted some other way."
  143. ""
  144. WINCLOSE
  145. WINOPEN 0 12 31
  146. ""
  147. "      Press [Enter] to Quit."
  148. WAIT 47 15
  149. :STOP_INSTALL
  150. winclose
  151. END
  152.